From: Eli Zaretskii Date: Sat, 13 Mar 2004 13:12:09 +0000 (+0000) Subject: (info-lookup): Reuse an existing Info window. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~23689 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=a698526cacfb59b3b212938d2d267e24c20b0b80;p=emacs.git (info-lookup): Reuse an existing Info window. --- diff --git a/lisp/info-look.el b/lisp/info-look.el index 8242932c3af..35138121838 100644 --- a/lisp/info-look.el +++ b/lisp/info-look.el @@ -338,7 +338,8 @@ If optional argument QUERY is non-nil, query for the help mode." (info-frame (and window (window-frame window)))) (if (and info-frame (display-multi-frame-p) - (memq info-frame (frames-on-display-list))) + (memq info-frame (frames-on-display-list)) + (not (eq info-frame (selected-frame)))) (select-frame info-frame) (switch-to-buffer-other-window "*info*"))))) (while (and (not found) modes)